jams[1:3, ]
class(jams[1:3, ])
jams[, 1]
jams$Type
prices <- huxtable(c("Price", 1.70, 2.00, 2.20))
number_format(prices) <- 2
bold(prices) <- TRUE
jams[, 2] <- prices
jams
data(jams)
jams$price <- c("Price", 1.70, 2.00, 2.20)
jams
Run the code above in your browser using DataLab